/ Eagles Nest BBS 8 / Eagles_Nest_Mac_Collection_Disc_8.TOAST / Developer Tools⁄Additions / MacsbugBook / MacsBug Book Disk / Debugger Prefs sources / Vol.c

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 56 6f 6c 2e 63 00 | 00 00 00 00 00 00 00 00 |..Vol.c.|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 11 07 00 | 00 01 df a3 66 7e 26 a3 |........|....f~&.|
|00000060| 66 7e 26 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |f~&.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 bc f9 00 00 |........|........|
|00000080| 2f 2a 20 09 76 6f 6c 2e | 63 0d 09 54 68 69 73 20 |/* .vol.|c..This |
|00000090| 69 73 20 74 68 65 20 56 | 43 42 20 64 63 6d 64 2e |is the V|CB dcmd.|
|000000a0| 0d 0d 09 43 6f 70 79 72 | 69 67 68 74 20 a9 20 31 |...Copyr|ight . 1|
|000000b0| 39 38 38 20 41 70 70 6c | 65 20 43 6f 6d 70 75 74 |988 Appl|e Comput|
|000000c0| 65 72 2c 20 49 6e 63 2e | 20 20 41 6c 6c 20 72 69 |er, Inc.|  All ri|
|000000d0| 67 68 74 73 20 72 65 73 | 65 72 76 65 64 2e 0d 0d |ghts res|erved...|
|000000e0| 09 4d 6f 64 69 66 69 63 | 61 74 69 6f 6e 20 68 69 |.Modific|ation hi|
|000000f0| 73 74 6f 72 79 3a 0d 09 | 09 32 39 4e 6f 76 38 38 |story:..|.29Nov88|
|00000100| 20 73 61 64 09 09 72 65 | 76 69 73 65 64 20 66 6f | sad..re|vised fo|
|00000110| 72 20 6e 65 77 20 64 63 | 6d 64 20 6e 61 6d 65 73 |r new dc|md names|
|00000120| 2e 20 20 64 69 73 70 6c | 61 79 20 6d 6f 72 65 20 |.  displ|ay more |
|00000130| 69 6e 66 6f 2e 0d 09 09 | 20 35 4f 63 74 38 38 20 |info....| 5Oct88 |
|00000140| 73 61 64 09 09 77 72 69 | 74 74 65 6e 2e 0d 0d 09 |sad..wri|tten....|
|00000150| 54 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 4d 50 |The foll|owing MP|
|00000160| 57 20 63 6f 6d 6d 61 6e | 64 73 20 77 69 6c 6c 20 |W comman|ds will |
|00000170| 62 75 69 6c 64 20 74 68 | 65 20 64 63 6d 64 20 61 |build th|e dcmd a|
|00000180| 6e 64 20 63 6f 70 79 20 | 69 74 20 74 6f 20 74 68 |nd copy |it to th|
|00000190| 65 0d 09 22 44 65 62 75 | 67 67 65 72 20 50 72 65 |e.."Debu|gger Pre|
|000001a0| 66 73 22 20 66 69 6c 65 | 20 69 6e 20 74 68 65 20 |fs" file| in the |
|000001b0| 53 79 73 74 65 6d 20 66 | 6f 6c 64 65 72 2e 20 54 |System f|older. T|
|000001c0| 68 65 20 64 63 6d 64 27 | 73 20 6e 61 6d 65 20 69 |he dcmd'|s name i|
|000001d0| 6e 0d 09 4d 61 63 73 42 | 75 67 20 77 69 6c 6c 20 |n..MacsB|ug will |
|000001e0| 62 65 20 74 68 65 20 6e | 61 6d 65 20 6f 66 20 74 |be the n|ame of t|
|000001f0| 68 65 20 66 69 6c 65 20 | 62 75 69 6c 74 20 62 79 |he file |built by|
|00000200| 20 74 68 65 20 4c 69 6e | 6b 65 72 2e 0d 09 59 6f | the Lin|ker...Yo|
|00000210| 75 20 6d 75 73 74 20 66 | 69 72 73 74 20 63 6f 70 |u must f|irst cop|
|00000220| 79 20 64 63 6d 64 2e 68 | 2c 20 64 63 6d 64 47 6c |y dcmd.h|, dcmdGl|
|00000230| 75 65 2e 61 2e 6f 20 61 | 6e 64 20 44 52 75 6e 54 |ue.a.o a|nd DRunT|
|00000240| 69 6d 65 2e 6f 20 66 72 | 6f 6d 20 74 68 65 0d 09 |ime.o fr|om the..|
|00000250| 43 20 53 61 6d 70 6c 65 | 73 20 66 6f 6c 64 65 72 |C Sample|s folder|
|00000260| 20 69 6e 74 6f 20 74 68 | 69 73 20 66 6f 6c 64 65 | into th|is folde|
|00000270| 72 2e 0d 0d 09 43 20 56 | 6f 6c 2e 63 0d 09 4c 69 |r....C V|ol.c..Li|
|00000280| 6e 6b 20 64 63 6d 64 47 | 6c 75 65 2e 61 2e 6f 20 |nk dcmdG|lue.a.o |
|00000290| 56 6f 6c 2e 63 2e 6f 20 | 70 75 74 2e 63 2e 6f 20 |Vol.c.o |put.c.o |
|000002a0| 44 52 75 6e 74 69 6d 65 | 2e 6f 20 22 7b 4c 69 62 |DRuntime|.o "{Lib|
|000002b0| 72 61 72 69 65 73 7d 22 | 49 6e 74 65 72 66 61 63 |raries}"|Interfac|
|000002c0| 65 2e 6f 20 2d 6f 20 56 | 6f 6c 0d 09 42 75 69 6c |e.o -o V|ol..Buil|
|000002d0| 64 44 63 6d 64 20 56 6f | 6c 20 31 30 30 32 0d 09 |dDcmd Vo|l 1002..|
|000002e0| 45 63 68 6f 20 27 69 6e | 63 6c 75 64 65 20 22 56 |Echo 'in|clude "V|
|000002f0| 6f 6c 22 3b 27 09 7c 09 | 52 65 7a 20 2d 61 20 2d |ol";'.|.|Rez -a -|
|00000300| 6f 20 22 7b 73 79 73 74 | 65 6d 46 6f 6c 64 65 72 |o "{syst|emFolder|
|00000310| 7d 44 65 62 75 67 67 65 | 72 20 50 72 65 66 73 22 |}Debugge|r Prefs"|
|00000320| 0d 2a 2f 0d 0d 23 69 6e | 63 6c 75 64 65 20 3c 54 |.*/..#in|clude <T|
|00000330| 79 70 65 73 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |ypes.h>.|#include|
|00000340| 20 3c 4d 65 6d 6f 72 79 | 2e 68 3e 0d 23 69 6e 63 | <Memory|.h>.#inc|
|00000350| 6c 75 64 65 20 3c 4f 53 | 55 74 69 6c 73 2e 68 3e |lude <OS|Utils.h>|
|00000360| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 46 69 6c 65 73 |.#includ|e <Files|
|00000370| 2e 68 3e 0d 0d 23 69 6e | 63 6c 75 64 65 20 22 64 |.h>..#in|clude "d|
|00000380| 63 6d 64 2e 68 22 0d 23 | 69 6e 63 6c 75 64 65 20 |cmd.h".#|include |
|00000390| 22 70 75 74 2e 68 22 0d | 0d 23 64 65 66 69 6e 65 |"put.h".|.#define|
|000003a0| 20 56 43 42 51 48 64 72 | 20 28 28 51 48 64 72 50 | VCBQHdr| ((QHdrP|
|000003b0| 74 72 29 30 78 33 35 36 | 29 0d 0d 0d 73 74 61 74 |tr)0x356|)...stat|
|000003c0| 69 63 20 76 6f 69 64 20 | 44 72 61 77 48 64 72 28 |ic void |DrawHdr(|
|000003d0| 29 0d 7b 0d 2f 2f 09 09 | 09 09 09 20 20 20 20 20 |).{.//..|...     |
|000003e0| 20 20 20 20 31 20 20 20 | 20 20 20 20 20 20 32 20 |    1   |      2 |
|000003f0| 20 20 20 20 20 20 20 20 | 33 20 20 20 20 20 20 20 |        |3       |
|00000400| 20 20 34 20 20 20 20 20 | 20 20 20 20 35 20 20 20 |  4     |    5   |
|00000410| 20 20 20 20 20 20 36 20 | 20 20 20 20 20 20 20 20 |      6 |        |
|00000420| 37 0d 2f 2f 09 09 09 09 | 09 31 32 33 34 35 36 37 |7.//....|.1234567|
|00000430| 38 39 30 31 32 33 34 35 | 36 37 38 39 30 31 32 33 |89012345|67890123|
|00000440| 34 35 36 37 38 39 30 31 | 32 33 34 35 36 37 38 39 |45678901|23456789|
|00000450| 30 31 32 33 34 35 36 37 | 38 39 30 31 32 33 34 35 |01234567|89012345|
|00000460| 36 37 38 39 30 31 32 33 | 34 35 36 37 38 39 30 31 |67890123|45678901|
|00000470| 32 33 34 35 36 37 38 39 | 0d 09 64 63 6d 64 44 72 |23456789|..dcmdDr|
|00000480| 61 77 4c 69 6e 65 28 22 | 5c 70 76 52 65 66 20 56 |awLine("|\pvRef V|
|00000490| 6f 6c 20 20 20 20 20 20 | 20 20 46 6c 67 20 64 52 |ol      |  Flg dR|
|000004a0| 65 66 20 44 72 69 76 65 | 20 46 53 49 44 20 23 42 |ef Drive| FSID #B|
|000004b0| 6c 6b 20 42 6c 6b 53 69 | 7a 20 23 46 69 6c 65 73 |lk BlkSi|z #Files|
|000004c0| 20 20 23 44 69 72 73 20 | 42 6c 73 64 20 44 69 72 |  #Dirs |Blsd Dir|
|000004d0| 20 56 43 42 20 61 74 22 | 29 3b 0d 7d 0d 0d 0d 73 | VCB at"|);.}...s|
|000004e0| 74 61 74 69 63 20 76 6f | 69 64 20 44 72 61 77 56 |tatic vo|id DrawV|
|000004f0| 43 42 28 56 43 42 2a 20 | 76 63 62 70 29 0d 7b 0d |CB(VCB* |vcbp).{.|
|00000500| 09 50 75 74 55 48 65 78 | 57 6f 72 64 28 76 63 62 |.PutUHex|Word(vcb|
|00000510| 70 2d 3e 76 63 62 56 52 | 65 66 4e 75 6d 29 3b 0d |p->vcbVR|efNum);.|
|00000520| 09 50 75 74 53 70 61 63 | 65 28 29 3b 0d 09 50 75 |.PutSpac|e();..Pu|
|00000530| 74 50 53 74 72 54 72 75 | 6e 63 54 6f 28 76 63 62 |tPStrTru|ncTo(vcb|
|00000540| 70 2d 3e 76 63 62 56 4e | 2c 31 35 29 3b 0d 09 50 |p->vcbVN|,15);..P|
|00000550| 75 74 53 70 61 63 65 28 | 29 3b 0d 09 50 75 74 43 |utSpace(|);..PutC|
|00000560| 68 61 72 28 28 76 63 62 | 70 2d 3e 76 63 62 46 6c |har((vcb|p->vcbFl|
|00000570| 61 67 73 20 26 20 30 78 | 38 30 30 30 29 20 3f 20 |ags & 0x|8000) ? |
|00000580| 27 44 27 20 3a 20 27 64 | 27 29 3b 0d 09 50 75 74 |'D' : 'd|');..Put|
|00000590| 43 68 61 72 28 28 76 63 | 62 70 2d 3e 76 63 62 41 |Char((vc|bp->vcbA|
|000005a0| 74 72 62 20 26 20 30 78 | 38 30 30 30 29 20 3f 20 |trb & 0x|8000) ? |
|000005b0| 27 53 27 20 3a 20 27 73 | 27 29 3b 0d 09 50 75 74 |'S' : 's|');..Put|
|000005c0| 43 68 61 72 28 28 76 63 | 62 70 2d 3e 76 63 62 41 |Char((vc|bp->vcbA|
|000005d0| 74 72 62 20 26 20 30 78 | 34 30 30 30 29 20 3f 20 |trb & 0x|4000) ? |
|000005e0| 27 48 27 20 3a 20 27 68 | 27 29 3b 0d 09 50 75 74 |'H' : 'h|');..Put|
|000005f0| 53 70 61 63 65 28 29 3b | 0d 09 50 75 74 55 48 65 |Space();|..PutUHe|
|00000600| 78 57 6f 72 64 28 76 63 | 62 70 2d 3e 76 63 62 44 |xWord(vc|bp->vcbD|
|00000610| 52 65 66 4e 75 6d 29 3b | 0d 09 50 75 74 53 70 61 |RefNum);|..PutSpa|
|00000620| 63 65 28 29 3b 0d 09 50 | 75 74 53 70 61 63 65 28 |ce();..P|utSpace(|
|00000630| 29 3b 0d 09 50 75 74 55 | 48 65 78 57 6f 72 64 28 |);..PutU|HexWord(|
|00000640| 76 63 62 70 2d 3e 76 63 | 62 44 72 76 4e 75 6d 29 |vcbp->vc|bDrvNum)|
|00000650| 3b 0d 09 50 75 74 53 70 | 61 63 65 28 29 3b 0d 09 |;..PutSp|ace();..|
|00000660| 50 75 74 55 48 65 78 57 | 6f 72 64 28 76 63 62 70 |PutUHexW|ord(vcbp|
|00000670| 2d 3e 76 63 62 46 53 49 | 44 29 3b 0d 09 50 75 74 |->vcbFSI|D);..Put|
|00000680| 53 70 61 63 65 28 29 3b | 0d 09 50 75 74 55 48 65 |Space();|..PutUHe|
|00000690| 78 57 6f 72 64 28 76 63 | 62 70 2d 3e 76 63 62 4e |xWord(vc|bp->vcbN|
|000006a0| 6d 41 6c 42 6c 6b 73 29 | 3b 0d 09 50 75 74 53 70 |mAlBlks)|;..PutSp|
|000006b0| 61 63 65 28 29 3b 0d 09 | 50 75 74 55 48 65 78 5a |ace();..|PutUHexZ|
|000006c0| 54 6f 28 76 63 62 70 2d | 3e 76 63 62 41 6c 42 6c |To(vcbp-|>vcbAlBl|
|000006d0| 6b 53 69 7a 2c 36 2c 34 | 37 29 3b 0d 09 50 75 74 |kSiz,6,4|7);..Put|
|000006e0| 53 70 61 63 65 28 29 3b | 0d 09 50 75 74 55 48 65 |Space();|..PutUHe|
|000006f0| 78 5a 54 6f 28 76 63 62 | 70 2d 3e 76 63 62 46 69 |xZTo(vcb|p->vcbFi|
|00000700| 6c 43 6e 74 2c 36 2c 35 | 34 29 3b 0d 09 50 75 74 |lCnt,6,5|4);..Put|
|00000710| 53 70 61 63 65 28 29 3b | 0d 09 50 75 74 55 48 65 |Space();|..PutUHe|
|00000720| 78 5a 54 6f 28 76 63 62 | 70 2d 3e 76 63 62 44 69 |xZTo(vcb|p->vcbDi|
|00000730| 72 43 6e 74 2c 36 2c 36 | 31 29 3b 0d 09 50 75 74 |rCnt,6,6|1);..Put|
|00000740| 53 70 61 63 65 28 29 3b | 0d 09 50 75 74 55 48 65 |Space();|..PutUHe|
|00000750| 78 5a 54 6f 28 76 63 62 | 70 2d 3e 76 63 62 46 6e |xZTo(vcb|p->vcbFn|
|00000760| 64 72 49 6e 66 6f 5b 30 | 5d 2c 36 2c 37 30 29 3b |drInfo[0|],6,70);|
|00000770| 0d 09 50 75 74 53 70 61 | 63 65 28 29 3b 0d 09 50 |..PutSpa|ce();..P|
|00000780| 75 74 55 48 65 78 5a 54 | 6f 28 28 75 6e 73 69 67 |utUHexZT|o((unsig|
|00000790| 6e 65 64 20 6c 6f 6e 67 | 29 76 63 62 70 2c 36 2c |ned long|)vcbp,6,|
|000007a0| 37 37 29 3b 0d 09 50 75 | 74 4c 69 6e 65 28 29 3b |77);..Pu|tLine();|
|000007b0| 0d 7d 0d 0d 0d 73 74 61 | 74 69 63 20 42 6f 6f 6c |.}...sta|tic Bool|
|000007c0| 65 61 6e 20 50 72 65 66 | 69 78 50 53 74 72 28 63 |ean Pref|ixPStr(c|
|000007d0| 6f 6e 73 74 20 53 74 72 | 32 35 35 20 61 73 74 72 |onst Str|255 astr|
|000007e0| 2c 20 63 6f 6e 73 74 20 | 53 74 72 32 35 35 20 62 |, const |Str255 b|
|000007f0| 73 74 72 29 0d 2f 2f 20 | 72 65 74 75 72 6e 73 20 |str).// |returns |
|00000800| 74 72 75 65 20 69 66 20 | 61 73 74 72 20 69 73 20 |true if |astr is |
|00000810| 65 71 75 61 6c 20 74 6f | 20 61 20 70 72 65 66 69 |equal to| a prefi|
|00000820| 78 20 6f 66 20 62 73 74 | 72 0d 2f 2f 09 61 73 74 |x of bst|r.//.ast|
|00000830| 72 20 6d 75 73 74 20 6e | 6f 74 20 62 65 20 6c 6f |r must n|ot be lo|
|00000840| 6e 67 65 72 20 74 68 61 | 6e 20 33 31 20 63 68 61 |nger tha|n 31 cha|
|00000850| 72 61 63 74 65 72 73 0d | 7b 0d 09 63 68 61 72 20 |racters.|{..char |
|00000860| 6e 65 77 73 74 72 5b 33 | 31 5d 3b 0d 09 69 6e 74 |newstr[3|1];..int|
|00000870| 20 61 6c 65 6e 20 3d 20 | 2a 61 73 74 72 3b 0d 09 | alen = |*astr;..|
|00000880| 69 6e 74 20 62 6c 65 6e | 20 3d 20 2a 62 73 74 72 |int blen| = *bstr|
|00000890| 3b 0d 09 69 66 20 28 61 | 6c 65 6e 20 3c 3d 20 62 |;..if (a|len <= b|
|000008a0| 6c 65 6e 29 0d 09 09 7b | 0d 09 09 42 6c 6f 63 6b |len)...{|...Block|
|000008b0| 4d 6f 76 65 28 62 73 74 | 72 2b 31 2c 6e 65 77 73 |Move(bst|r+1,news|
|000008c0| 74 72 2b 31 2c 61 6c 65 | 6e 29 3b 0d 09 09 6e 65 |tr+1,ale|n);...ne|
|000008d0| 77 73 74 72 5b 30 5d 20 | 3d 20 61 6c 65 6e 3b 0d |wstr[0] |= alen;.|
|000008e0| 09 09 72 65 74 75 72 6e | 20 45 71 75 61 6c 53 74 |..return| EqualSt|
|000008f0| 72 69 6e 67 28 61 73 74 | 72 2c 6e 65 77 73 74 72 |ring(ast|r,newstr|
|00000900| 2c 66 61 6c 73 65 2c 74 | 72 75 65 29 3b 0d 09 09 |,false,t|rue);...|
|00000910| 7d 0d 09 65 6c 73 65 20 | 72 65 74 75 72 6e 20 66 |}..else |return f|
|00000920| 61 6c 73 65 3b 09 0d 7d | 20 2f 2f 20 50 72 65 66 |alse;..}| // Pref|
|00000930| 69 78 50 53 74 72 0d 0d | 2f 2f 20 45 4a 45 43 54 |ixPStr..|// EJECT|
|00000940| 0d 0d 70 61 73 63 61 6c | 20 76 6f 69 64 20 43 6f |..pascal| void Co|
|00000950| 6d 6d 61 6e 64 45 6e 74 | 72 79 28 64 63 6d 64 42 |mmandEnt|ry(dcmdB|
|00000960| 6c 6f 63 6b 2a 20 70 61 | 72 61 6d 50 74 72 29 0d |lock* pa|ramPtr).|
|00000970| 7b 0d 09 73 77 69 74 63 | 68 20 28 70 61 72 61 6d |{..switc|h (param|
|00000980| 50 74 72 2d 3e 72 65 71 | 75 65 73 74 29 0d 09 09 |Ptr->req|uest)...|
|00000990| 7b 0d 09 09 63 61 73 65 | 20 64 63 6d 64 49 6e 69 |{...case| dcmdIni|
|000009a0| 74 3a 0d 09 09 09 62 72 | 65 61 6b 3b 0d 0d 09 09 |t:....br|eak;....|
|000009b0| 63 61 73 65 20 64 63 6d | 64 48 65 6c 70 3a 0d 09 |case dcm|dHelp:..|
|000009c0| 09 09 64 63 6d 64 44 72 | 61 77 4c 69 6e 65 28 22 |..dcmdDr|awLine("|
|000009d0| 5c 70 76 6f 6c 20 5b 76 | 52 65 66 4e 75 6d 7c 64 |\pvol [v|RefNum|d|
|000009e0| 72 76 4e 75 6d 7c 5c 22 | 76 6f 6c 20 6e 61 6d 65 |rvNum|\"|vol name|
|000009f0| 5c 22 5d 22 29 3b 0d 09 | 09 09 64 63 6d 64 44 72 |\"]");..|..dcmdDr|
|00000a00| 61 77 4c 69 6e 65 28 22 | 5c 70 20 20 20 44 69 73 |awLine("|\p   Dis|
|00000a10| 70 6c 61 79 73 20 76 6f | 6c 75 6d 65 20 69 6e 66 |plays vo|lume inf|
|00000a20| 6f 72 6d 61 74 69 6f 6e | 20 66 6f 72 20 74 68 65 |ormation| for the|
|00000a30| 20 67 69 76 65 6e 20 76 | 72 65 66 6e 75 6d 2c 20 | given v|refnum, |
|00000a40| 76 6f 6c 75 6d 65 20 6e | 61 6d 65 20 6f 72 20 61 |volume n|ame or a|
|00000a50| 6c 6c 20 6d 6f 75 6e 74 | 65 64 20 76 6f 6c 75 6d |ll mount|ed volum|
|00000a60| 65 73 2e 22 29 3b 0d 09 | 09 09 64 63 6d 64 44 72 |es.");..|..dcmdDr|
|00000a70| 61 77 4c 69 6e 65 28 22 | 5c 70 20 20 20 20 20 20 |awLine("|\p      |
|00000a80| 46 6c 61 67 73 20 61 72 | 65 20 44 2f 64 3d 44 69 |Flags ar|e D/d=Di|
|00000a90| 72 74 79 2c 20 53 2f 73 | 3d 53 6f 66 74 77 61 72 |rty, S/s|=Softwar|
|00000aa0| 65 20 6c 6f 63 6b 65 64 | 2c 20 48 2f 68 3d 48 61 |e locked|, H/h=Ha|
|00000ab0| 72 64 77 61 72 65 20 6c | 6f 63 6b 65 64 2e 22 29 |rdware l|ocked.")|
|00000ac0| 3b 0d 09 09 09 62 72 65 | 61 6b 3b 0d 0d 09 09 63 |;....bre|ak;....c|
|00000ad0| 61 73 65 20 64 63 6d 64 | 44 6f 49 74 3a 0d 09 09 |ase dcmd|DoIt:...|
|00000ae0| 09 7b 0d 09 09 09 42 6f | 6f 6c 65 61 6e 20 64 6f |.{....Bo|olean do|
|00000af0| 4f 6e 65 56 43 42 20 3d | 20 66 61 6c 73 65 3b 0d |OneVCB =| false;.|
|00000b00| 09 09 09 6c 6f 6e 67 20 | 76 72 65 66 3b 0d 09 09 |...long |vref;...|
|00000b10| 09 73 68 6f 72 74 20 63 | 3b 0d 09 09 09 42 6f 6f |.short c|;....Boo|
|00000b20| 6c 65 61 6e 20 68 61 76 | 65 56 6f 6c 4e 61 6d 65 |lean hav|eVolName|
|00000b30| 20 3d 20 66 61 6c 73 65 | 3b 0d 09 09 09 53 74 72 | = false|;....Str|
|00000b40| 32 35 35 20 76 6f 6c 6e | 61 6d 65 3b 0d 09 09 09 |255 voln|ame;....|
|00000b50| 56 43 42 2a 20 76 63 62 | 70 3b 0d 09 09 09 69 6e |VCB* vcb|p;....in|
|00000b60| 74 20 6e 75 6d 76 63 62 | 73 20 3d 20 30 3b 0d 09 |t numvcb|s = 0;..|
|00000b70| 09 09 42 6f 6f 6c 65 61 | 6e 20 66 6f 75 6e 64 4f |..Boolea|n foundO|
|00000b80| 6e 65 20 3d 20 66 61 6c | 73 65 3b 0d 0d 09 09 09 |ne = fal|se;.....|
|00000b90| 64 63 6d 64 53 77 61 70 | 57 6f 72 6c 64 73 28 29 |dcmdSwap|Worlds()|
|00000ba0| 3b 0d 0d 09 09 09 64 63 | 6d 64 44 72 61 77 4c 69 |;.....dc|mdDrawLi|
|00000bb0| 6e 65 28 22 5c 70 44 69 | 73 70 6c 61 79 69 6e 67 |ne("\pDi|splaying|
|00000bc0| 20 56 6f 6c 75 6d 65 20 | 43 6f 6e 74 72 6f 6c 20 | Volume |Control |
|00000bd0| 42 6c 6f 63 6b 73 22 29 | 3b 0d 0d 09 09 20 20 2f |Blocks")|;....  /|
|00000be0| 2f 20 67 65 74 20 6c 6f | 77 2d 6d 65 6d 6f 72 79 |/ get lo|w-memory|
|00000bf0| 20 76 61 6c 75 65 73 20 | 61 66 74 65 72 20 64 63 | values |after dc|
|00000c00| 6d 64 53 77 61 70 57 6f | 72 6c 64 73 28 29 0d 09 |mdSwapWo|rlds()..|
|00000c10| 09 09 76 63 62 70 20 3d | 20 28 56 43 42 2a 29 28 |..vcbp =| (VCB*)(|
|00000c20| 56 43 42 51 48 64 72 2d | 3e 71 48 65 61 64 29 3b |VCBQHdr-|>qHead);|
|00000c30| 0d 0d 09 09 09 63 20 3d | 20 64 63 6d 64 50 65 65 |.....c =| dcmdPee|
|00000c40| 6b 41 74 4e 65 78 74 43 | 68 61 72 28 29 3b 0d 09 |kAtNextC|har();..|
|00000c50| 09 09 69 66 20 28 63 20 | 3d 3d 20 27 22 27 20 7c |..if (c |== '"' ||
|00000c60| 7c 20 63 20 3d 3d 20 27 | 5c 27 27 29 0d 09 09 09 || c == '|\'')....|
|00000c70| 09 7b 0d 09 09 09 09 68 | 61 76 65 56 6f 6c 4e 61 |.{.....h|aveVolNa|
|00000c80| 6d 65 20 3d 20 74 72 75 | 65 3b 0d 09 09 09 09 28 |me = tru|e;.....(|
|00000c90| 76 6f 69 64 29 64 63 6d | 64 47 65 74 4e 65 78 74 |void)dcm|dGetNext|
|00000ca0| 50 61 72 61 6d 65 74 65 | 72 28 76 6f 6c 6e 61 6d |Paramete|r(volnam|
|00000cb0| 65 29 3b 0d 09 09 09 09 | 7d 0d 09 09 09 65 6c 73 |e);.....|}....els|
|00000cc0| 65 20 28 76 6f 69 64 29 | 64 63 6d 64 47 65 74 4e |e (void)|dcmdGetN|
|00000cd0| 65 78 74 45 78 70 72 65 | 73 73 69 6f 6e 28 26 76 |extExpre|ssion(&v|
|00000ce0| 72 65 66 2c 20 26 64 6f | 4f 6e 65 56 43 42 29 3b |ref, &do|OneVCB);|
|00000cf0| 0d 0d 09 09 09 69 66 20 | 28 64 6f 4f 6e 65 56 43 |.....if |(doOneVC|
|00000d00| 42 29 20 76 72 65 66 20 | 3d 20 28 73 68 6f 72 74 |B) vref |= (short|
|00000d10| 29 76 72 65 66 3b 0d 0d | 09 09 09 77 68 69 6c 65 |)vref;..|...while|
|00000d20| 20 28 76 63 62 70 29 0d | 09 09 09 09 7b 0d 09 09 | (vcbp).|....{...|
|00000d30| 09 09 69 66 20 28 28 64 | 6f 4f 6e 65 56 43 42 20 |..if ((d|oOneVCB |
|00000d40| 26 26 20 28 76 63 62 70 | 2d 3e 76 63 62 56 52 65 |&& (vcbp|->vcbVRe|
|00000d50| 66 4e 75 6d 20 3d 3d 20 | 76 72 65 66 20 7c 7c 20 |fNum == |vref || |
|00000d60| 76 63 62 70 2d 3e 76 63 | 62 44 72 76 4e 75 6d 20 |vcbp->vc|bDrvNum |
|00000d70| 3d 3d 20 76 72 65 66 29 | 29 20 7c 7c 0d 09 09 09 |== vref)|) ||....|
|00000d80| 09 09 28 68 61 76 65 56 | 6f 6c 4e 61 6d 65 20 26 |..(haveV|olName &|
|00000d90| 26 20 50 72 65 66 69 78 | 50 53 74 72 28 76 6f 6c |& Prefix|PStr(vol|
|00000da0| 6e 61 6d 65 2c 76 63 62 | 70 2d 3e 76 63 62 56 4e |name,vcb|p->vcbVN|
|00000db0| 29 29 20 7c 7c 0d 09 09 | 09 09 09 28 21 64 6f 4f |)) ||...|...(!doO|
|00000dc0| 6e 65 56 43 42 20 26 26 | 20 21 68 61 76 65 56 6f |neVCB &&| !haveVo|
|00000dd0| 6c 4e 61 6d 65 29 29 0d | 09 09 09 09 09 7b 0d 09 |lName)).|.....{..|
|00000de0| 09 09 09 09 6e 75 6d 76 | 63 62 73 2b 2b 3b 0d 09 |....numv|cbs++;..|
|00000df0| 09 09 09 09 69 66 20 28 | 21 66 6f 75 6e 64 4f 6e |....if (|!foundOn|
|00000e00| 65 29 0d 09 09 09 09 09 | 09 7b 0d 09 09 09 09 09 |e)......|.{......|
|00000e10| 09 44 72 61 77 48 64 72 | 28 29 3b 0d 09 09 09 09 |.DrawHdr|();.....|
|00000e20| 09 09 66 6f 75 6e 64 4f | 6e 65 20 3d 20 74 72 75 |..foundO|ne = tru|
|00000e30| 65 3b 0d 09 09 09 09 09 | 09 7d 0d 09 09 09 09 09 |e;......|.}......|
|00000e40| 44 72 61 77 56 43 42 28 | 76 63 62 70 29 3b 0d 09 |DrawVCB(|vcbp);..|
|00000e50| 09 09 09 09 7d 0d 09 09 | 09 09 69 66 20 28 70 61 |....}...|..if (pa|
|00000e60| 72 61 6d 50 74 72 2d 3e | 61 62 6f 72 74 65 64 29 |ramPtr->|aborted)|
|00000e70| 20 62 72 65 61 6b 3b 0d | 09 09 09 09 69 66 20 28 | break;.|....if (|
|00000e80| 76 63 62 70 2d 3e 71 4c | 69 6e 6b 20 3d 3d 20 30 |vcbp->qL|ink == 0|
|00000e90| 29 0d 09 09 09 09 09 69 | 66 20 28 76 63 62 70 20 |)......i|f (vcbp |
|00000ea0| 21 3d 20 28 56 43 42 2a | 29 28 56 43 42 51 48 64 |!= (VCB*|)(VCBQHd|
|00000eb0| 72 2d 3e 71 54 61 69 6c | 29 29 0d 09 09 09 09 09 |r->qTail|))......|
|00000ec0| 09 64 63 6d 64 44 72 61 | 77 4c 69 6e 65 28 22 5c |.dcmdDra|wLine("\|
|00000ed0| 70 56 43 42 20 71 75 65 | 75 65 20 64 6f 65 73 20 |pVCB que|ue does |
|00000ee0| 6e 6f 74 20 65 6e 64 20 | 61 74 20 56 43 42 51 48 |not end |at VCBQH|
|00000ef0| 64 72 2e 71 54 61 69 6c | 22 29 3b 0d 09 09 09 09 |dr.qTail|");.....|
|00000f00| 76 63 62 70 20 3d 20 28 | 56 43 42 2a 29 76 63 62 |vcbp = (|VCB*)vcb|
|00000f10| 70 2d 3e 71 4c 69 6e 6b | 3b 0d 09 09 09 09 7d 0d |p->qLink|;.....}.|
|00000f20| 09 09 09 69 66 20 28 21 | 70 61 72 61 6d 50 74 72 |...if (!|paramPtr|
|00000f30| 2d 3e 61 62 6f 72 74 65 | 64 29 0d 09 09 09 09 69 |->aborte|d).....i|
|00000f40| 66 20 28 68 61 76 65 56 | 6f 6c 4e 61 6d 65 20 7c |f (haveV|olName ||
|00000f50| 7c 20 64 6f 4f 6e 65 56 | 43 42 29 0d 09 09 09 09 || doOneV|CB).....|
|00000f60| 09 7b 0d 09 09 09 09 09 | 69 66 20 28 21 66 6f 75 |.{......|if (!fou|
|00000f70| 6e 64 4f 6e 65 29 0d 09 | 09 09 09 09 09 69 66 20 |ndOne)..|.....if |
|00000f80| 28 68 61 76 65 56 6f 6c | 4e 61 6d 65 29 0d 09 09 |(haveVol|Name)...|
|00000f90| 09 09 09 09 09 7b 0d 09 | 09 09 09 09 09 09 50 75 |.....{..|......Pu|
|00000fa0| 74 50 53 74 72 28 22 5c | 70 6e 6f 20 6d 6f 75 6e |tPStr("\|pno moun|
|00000fb0| 74 65 64 20 76 6f 6c 75 | 6d 65 73 20 6d 61 74 63 |ted volu|mes matc|
|00000fc0| 68 20 5c 22 22 29 3b 0d | 09 09 09 09 09 09 09 50 |h \"");.|.......P|
|00000fd0| 75 74 50 53 74 72 28 76 | 6f 6c 6e 61 6d 65 29 3b |utPStr(v|olname);|
|00000fe0| 0d 09 09 09 09 09 09 09 | 50 75 74 43 68 61 72 28 |........|PutChar(|
|00000ff0| 27 22 27 29 3b 0d 09 09 | 09 09 09 09 09 50 75 74 |'"');...|.....Put|
|00001000| 4c 69 6e 65 28 29 3b 0d | 09 09 09 09 09 09 09 7d |Line();.|.......}|
|00001010| 0d 09 09 09 09 09 09 65 | 6c 73 65 0d 09 09 09 09 |.......e|lse.....|
|00001020| 09 09 09 7b 0d 09 09 09 | 09 09 09 09 50 75 74 50 |...{....|....PutP|
|00001030| 53 74 72 28 22 5c 70 6e | 6f 20 6d 6f 75 6e 74 65 |Str("\pn|o mounte|
|00001040| 64 20 76 6f 6c 75 6d 65 | 73 20 6d 61 74 63 68 20 |d volume|s match |
|00001050| 22 29 3b 0d 09 09 09 09 | 09 09 09 50 75 74 55 48 |");.....|...PutUH|
|00001060| 65 78 57 6f 72 64 28 76 | 72 65 66 29 3b 0d 09 09 |exWord(v|ref);...|
|00001070| 09 09 09 09 09 50 75 74 | 4c 69 6e 65 28 29 3b 0d |.....Put|Line();.|
|00001080| 09 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 7d 0d |.......}|......}.|
|00001090| 09 09 09 09 65 6c 73 65 | 0d 09 09 09 09 09 7b 0d |....else|......{.|
|000010a0| 09 09 09 09 09 50 75 74 | 55 44 65 63 28 6e 75 6d |.....Put|UDec(num|
|000010b0| 76 63 62 73 29 3b 0d 09 | 09 09 09 09 50 75 74 50 |vcbs);..|....PutP|
|000010c0| 53 74 72 28 22 5c 70 20 | 56 43 42 73 22 29 3b 0d |Str("\p |VCBs");.|
|000010d0| 09 09 09 09 09 50 75 74 | 4c 69 6e 65 28 29 3b 0d |.....Put|Line();.|
|000010e0| 09 09 09 09 09 7d 0d 0d | 09 09 09 64 63 6d 64 53 |.....}..|...dcmdS|
|000010f0| 77 61 70 57 6f 72 6c 64 | 73 28 29 3b 0d 09 09 09 |wapWorld|s();....|
|00001100| 7d 0d 09 09 09 62 72 65 | 61 6b 3b 0d 0d 09 09 64 |}....bre|ak;....d|
|00001110| 65 66 61 75 6c 74 3a 0d | 09 09 09 50 75 74 50 53 |efault:.|...PutPS|
|00001120| 74 72 28 22 5c 70 75 6e | 6b 6e 6f 77 6e 20 72 65 |tr("\pun|known re|
|00001130| 71 75 65 73 74 20 22 29 | 3b 0d 09 09 09 50 75 74 |quest ")|;....Put|
|00001140| 55 44 65 63 28 70 61 72 | 61 6d 50 74 72 2d 3e 72 |UDec(par|amPtr->r|
|00001150| 65 71 75 65 73 74 29 3b | 0d 09 09 09 50 75 74 4c |equest);|....PutL|
|00001160| 69 6e 65 28 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |ine();..|..break;|
|00001170| 0d 09 09 7d 0d 7d 20 2f | 2f 20 43 6f 6d 6d 61 6e |...}.} /|/ Comman|
|00001180| 64 45 6e 74 72 79 0d 00 | 00 00 00 00 00 00 00 00 |dEntry..|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 01 00 00 00 01 8d | 00 00 00 8d 00 00 00 52 |........|.......R|
|00001210| 65 73 45 64 69 74 3a 55 | 73 65 72 53 74 61 72 74 |esEdit:U|serStart|
|00001220| 75 70 22 0d 62 75 69 6c | 64 72 65 73 65 64 69 74 |up".buil|dresedit|
|00001230| 05 56 6f 6c 2e 63 02 00 | 00 00 54 45 58 54 4d 50 |.Vol.c..|..TEXTMP|
|00001240| 53 20 01 00 01 40 00 00 | 00 00 00 00 03 da 00 00 |S ...@..|........|
|00001250| 00 00 54 45 58 54 4d 50 | 53 20 01 00 01 40 00 00 |..TEXTMP|S ...@..|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 a2 d1 e8 c0 00 00 | 11 07 00 00 01 df 77 61 |........|......wa|
|00001280| 73 20 6e 6f 74 20 6e 65 | 65 64 65 64 20 66 6f 72 |s not ne|eded for|
|00001290| 20 6c 69 6e 6b 3a 20 28 | 45 72 72 6f 72 20 35 32 | link: (|Error 52|
|000012a0| 29 20 48 44 3a 4d 50 57 | 43 2b 2b 3a 4c 69 62 72 |) HD:MPW|C++:Libr|
|000012b0| 61 72 69 65 73 3a 50 4c | 69 62 72 61 72 69 65 73 |aries:PL|ibraries|
|000012c0| 3a 50 61 73 4c 69 62 2e | 6f 0d 23 23 23 20 4c 69 |:PasLib.|o.### Li|
|000012d0| 6e 6b 3a 20 57 61 72 6e | 69 6e 67 3a 20 46 69 6c |nk: Warn|ing: Fil|
|000012e0| 65 20 77 61 73 20 6e 6f | 74 20 6e 65 65 64 65 64 |e was no|t needed|
|000012f0| 20 66 6f 72 20 6c 69 6e | 6b 3a 20 28 45 72 72 6f | for lin|k: (Erro|
|00001300| 00 00 00 1b 06 02 60 01 | 00 00 06 36 2e 32 62 31 |......`.|...6.2b1|
|00001310| 31 0d 4d 61 63 73 42 75 | 67 20 36 2e 32 62 31 00 |1.MacsBu|g 6.2b1.|
|00001320| 00 00 48 00 09 4d 6f 6e | 61 63 6f 00 00 00 a0 00 |..H..Mon|aco.....|
|00001330| 01 a6 7c 00 0a 00 03 00 | 09 00 0e 00 0a 00 00 00 |..|.....|........|
|00001340| 00 00 8c 00 01 00 06 00 | 04 00 31 00 0a 01 49 01 |........|..1...I.|
|00001350| ea 00 31 00 0a 01 49 01 | ea a3 66 37 d6 00 00 01 |..1...I.|..f7....|
|00001360| f4 00 00 01 f4 00 00 11 | 07 01 00 00 00 00 1e 00 |........|........|
|00001370| 31 00 0a 01 49 01 ea 00 | 31 00 0a 01 49 01 ea 00 |1...I...|1...I...|
|00001380| 00 11 07 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00001390| 00 00 00 01 8d 00 00 00 | 8d 00 00 00 52 00 11 0f |........|....R...|
|000013a0| d4 0f 10 00 00 00 1c 00 | 52 00 01 76 65 72 73 00 |........|R..vers.|
|000013b0| 00 00 12 4d 50 53 52 00 | 01 00 1e 00 02 ff ff 20 |...MPSR.|....... |
|000013c0| 00 00 00 00 00 00 00 03 | ed ff ff 00 00 00 1f 00 |........|........|
|000013d0| 00 00 00 03 f0 ff ff 00 | 00 00 6b 00 12 f1 14 00 |........|..k.....|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+